open(WRBUFF,">snps_in_gene.txt");
for($i=1;$i<119;$i++)
{
	open BUFF,"./$i/snps_in_gene.txt" or die "no file found ./$i/AUC.txt\n";
	$line = <BUFF>;
	if($i==1)
	{
		print WRBUFF $line;
	}
	while(<BUFF>)
	{
		print WRBUFF $_;
	}
	#system("rm -rf ./$i/*");
	#system("rmdir $i");
}
close(BUFF);
close(WRBUFF);
